home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / x2ftp / msdos / fg / fgl402c / exc.arj / TEMP / 06-01.C < prev    next >
Text File  |  1995-01-20  |  976b  |  49 lines
  1. #include <fastgraf.h>
  2. #include <stdlib.h>
  3.  
  4. void main(void);
  5.  
  6. void main()
  7. {
  8.    int area;
  9.    int color, colors;
  10.    int left;
  11.    int new_mode, old_mode;
  12.    int x_range, y_range;
  13.    int x, y;
  14.  
  15.    fg_initpm();
  16.    old_mode = fg_getmode();
  17.    new_mode = fg_automode();
  18.    fg_setmode(new_mode);
  19.  
  20.    colors = fg_colors();
  21.    x_range = fg_getmaxx() - 1;
  22.    y_range = fg_getmaxy() - 1;
  23.    left = 100;
  24.  
  25.    while (left > 0)
  26.    {
  27.  
  28.       x = (rand() % x_range) + 1;
  29.       y = (rand() % y_range) + 1;
  30.  
  31.       area = fg_getpixel(x-1,y-1) + fg_getpixel(x,y-1) + fg_getpixel(x+1,y-1)
  32.            + fg_getpixel(x-1,y)   + fg_getpixel(x,y)   + fg_getpixel(x+1,y)
  33.            + fg_getpixel(x-1,y+1) + fg_getpixel(x,y+1) + fg_getpixel(x+1,y+1);
  34.  
  35.       if (area == 0)
  36.       {
  37.          color = rand() % colors;
  38.          fg_setcolor(color);
  39.          fg_point(x,y);
  40.          left--;
  41.       }
  42.    }
  43.  
  44.    fg_waitkey();
  45.  
  46.    fg_setmode(old_mode);
  47.    fg_reset();
  48. }
  49.